OT: Word - pohyb ve formulari

Otázka od: Plisek Jan Ing.

3. 12. 2002 7:00

Vazeni,

pokousim se o kontrolu spravnosti vstupu do pole formulare pomoci
maker. Nevim vsak, jakym prikazem se mohu vratit na predchozi
pole, ktere bylo zjisteno jako chybne. V nasledujicim makru je
videt nekolik neuspesnych pokusu i navrat do pole Text1.

Sub KontrolaPříjmení()
  With ActiveDocument
    'Nejprve se uschová aktuální pozice kurzoru a kurzor se nastaví
  'na
počátek dokumentu.
    .Bookmarks.Add Name:="Temporary"
    If .FormFields("Text1").Result = "" Then
      MsgBox "Příjmení je povinná položka!", vbCritical
      '.FormFields("Text1").Select
      'Selection.MoveUp Unit:=wdLine
      ' Nastaví kurzor na původní místo
      .GoTo What:=wdGoToBookmark, Name:="Temporary"
      .Bookmarks.Item("Temporary").Delete
    End If
  End With
End Sub
Dekuji predem za radu
ing. Jan Plisek e-mail: plisek@spse.cz
SPSE a VOS tel. +420 466 614 788
Karla IV. 13 fax. +420 466 614 763
531 69 PARDUBICE http://www.spse.cz
Czech Republic